home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 26.zip / BS1 part 26 / C for beginners.adf / source / strlen.c < prev    next >
Text File  |  1978-01-17  |  622b  |  20 lines
  1. /* Filename: "strlen.c" */
  2. /**********************************************************************/
  3. /* Name:          strlen                                              */
  4. /* Parameter:     s (String)                                          */
  5. /* Return value: Length (int)                                         */
  6. /* Function:    Number of characters in "s"                           */
  7. /* Other:     -                                                       */
  8. /*********************************************************************/
  9.  
  10. strlen(s)
  11. char s[];
  12. {
  13.   register int i = 0;
  14.   while(s[i])
  15.     i++;
  16.   return(i);
  17. }
  18.  
  19.  
  20.